home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / comm2 / sspdl133.lha / SysOpDL / Install < prev    next >
Text File  |  1995-09-24  |  9KB  |  273 lines
  1. ;Install-Script for SysOp-Download by SieGeL (tRSi/X-iNNOVATiON)
  2. ;$VER: Install_SysOpDL 0.01 (09.21.95)
  3.  
  4. (SET @default-dest "DOORS:")
  5. (SET commanddir "BBS:COMMANDS/BBSCMD/")
  6.  
  7. ;=============================================================================
  8.  
  9.      (set #bad-kick     (cat     "\n\nYou must be using Kickstart 2.0 or higher to install SysOp-Download !!!"))
  10.   (set #BBSHELP        (cat    "\nTo install the right Start-Command for your BBS-\nSystem, the Installer needs to know which BBS-System you are running. Please choose your System.\n\n" @ASKCHOICE-HELP))
  11.   (set #DESTHELP    (cat    "\nYou have to choose a destination for the Program.\nA drawer won't be created for SysOp-Download!\n\n" @ASKDIR-HELP))
  12.   (set #PWHELP        (cat    "\nThis Password will be used as Security-Check when\nstarting SysOp-Download. The Password could be\nabout 40 Chars long, longer Strings are cutted.\n\n"))
  13.   (set #PACKERS        (cat    "\nSysOp-Download is able to control three different\npackers to allow users to pack the files before\ndownloading them. You must not support this feature\nbut it's recommended to do this, otherwise users\nwon't be able to download i.e. directories.\n\n"))
  14.     (SET dokuhelp     (CAT
  15.                                                 "\nSysOpDL.guide:\n\n"
  16.                                                 "This is the main documentation for SysOpDownload.\n"
  17.                                                 "You should take at least one look to this guide\n"
  18.                                                 "to understand how SysOpDL works.\n\n"
  19.                                                 "SysOpDL.history:\n\n"
  20.                                                 "Here you see all changings & bugfixings made since\n"
  21.                                                 "creation time.\n\n\n\n"
  22.                                                 "SysOpDL.hlp:\n\n"
  23.                                                 "This is the Online-Help for SysOpDL, which will be\n"
  24.                                                 "shown when an user enters '?' in the Prompt.\n"
  25.                                                 "It's not neccessary to install this file, but for\n"
  26.                                                 "better understanding how it works, you should install it."))
  27.   (SET #GODS                    "Another Tool comming from the \"REAL\"\n(tRSi/X-iNNOVATiON)")
  28.     (SET #SYSED         "NOW PLEASE LOAD THE FILE \"DS\" INTO YOUR SYSTEMEDITOR AND EDIT THE PATH TO SysOp-Download !\n\n")
  29.     (SET #FAMEDEST            "Please select destination directory for SysOpDL Door definition:")
  30.  
  31. ;-------------------- START OF INSTALLATION-SCRIPT -------------------------
  32.  
  33. (COMPLETE 0)
  34.  
  35. (if (< (/ (getversion) 65536) 37) ( (abort #bad-kick)))
  36.  
  37. (WELCOME "Welcome to the SysOp-Download Installation-Script.")
  38. (MESSAGE "This Script will install SysOp-Download and all related files to your BBS-System.\n\nPlease note that this Tool requires Amiex or FAME BBS to run !\n\nFAME (c) 1993-95 by David Wettig\nAMIEX (c) 1992-95 by Lightspeed Technologies\nInstaller (c) 1991-93 Commodore-Amiga Inc.\n\nAll Rights Reserved.\n")
  39.  
  40. ;-------------- ERSTMAL ABCHECKEN, WELCHE BBS LÄUFT ------------------------
  41.  
  42. (COMPLETE 10)
  43.  
  44. (SET BBSSYSTEM
  45.  (ASKCHOICE     (PROMPT "\nPlease choose the BBS-System\nyou are running on your System:\n")
  46.             (HELP #BBSHELP)
  47.                 (CHOICES "FAME"
  48.                      "AMIEX")
  49.                 (DEFAULT 1)))
  50.  
  51. ;---------------- DANN ERSTMAL DAS DOOR INSTALLEN --------------------------
  52.  
  53. (COMPLETE 20)
  54.  
  55.   (SET maindest
  56.    (ASKDIR (PROMPT "Please select Destination for SysOp-Download:")
  57.            (HELP #DESTHELP)
  58.        (DEFAULT @default-dest)))
  59.  
  60. (SET @default-dest maindest)
  61.  
  62. (IF (exists "SysOpDL" (NOREQ))
  63.     (
  64.   (COPYFILES (SOURCE "SysOpDL")
  65.          (DEST @default-dest)
  66.              (INFOS))
  67.     )
  68.  
  69.     (
  70.     (MESSAGE (cat    "\nInstaller was not able to found SysOpDL !\n\n"
  71.                                 "You are a registered User and your registered\n"
  72.                                 "mainfile is not included in this archive, so\n"
  73.                                 "please select your mainfile in the filerequester.\n\n"
  74.                                 "Thanks for registering my Tools...\n\n"
  75.                                 "Signed: SieGeL (tRSi/X-iNNOVATiON)\n"))
  76.  
  77.     (SET regloc
  78.         (ASKFILE     (PROMPT "Choose location of SysOp-Download Registered:")
  79.                         (HELP @askfile-help)
  80.                             (DEFAULT (EXPANDPATH ""))))
  81.     (COPYFILES     (SOURCE regloc)
  82.               (DEST @default-dest))
  83.     (COPYFILES    (SOURCE "SysOpDL.info")
  84.                             (DEST @default-dest))
  85.     )
  86. )
  87.  
  88. (SET PRGDIR (TACKON @default-dest "SysOpDL"))
  89.  
  90. ;------------------------- PASSWORD ABFRAGEN ----------------------------
  91.  
  92. (COMPLETE 30)
  93.  
  94. (SET Abbruch 0)
  95. (WHILE (<> Abbruch 1)
  96.     (SET Password
  97.         (ASKSTRING     (PROMPT "Please enter a Password to use\nwhen starting SysOp-Download:")
  98.                   (HELP #PWHELP)))
  99.   (IF (<> Password "")
  100.         (
  101.         (SET Abbruch 1)
  102.         )
  103.     (
  104.     (message "\nPASSWORD IS ABSOLUTLY REQUIRED FOR SYSOP-DOWNLOAD TO WORK !")
  105.     ))
  106. )
  107.  
  108. ;------------------------ PACKER-SUPPORT ABFRAGEN -----------------------
  109.  
  110. (COMPLETE 40)
  111.  
  112. (SET JANEIN
  113.     (ASKBOOL (PROMPT "\n\nDo you wish to use the Packer-\nSupport of SysOp-Download ?\n\n(LHA,LZX & ZIP supported) ?\n")
  114.                         (HELP #PACKERS)
  115.             (CHOICES ("Yes, I wish it")
  116.                      ("No, Don't need it"))))
  117.  
  118. ;-------------------------- PACKER INSTALLIEREN -------------------------
  119.  
  120. (IF (= JANEIN 1)
  121.     (
  122.     (COMPLETE 42)
  123.     (SET lhapacker "")
  124.     (SET lzxpacker "")
  125.     (SET zippacker "")
  126.  
  127.     (SET tempdir
  128.         (ASKDIR    (PROMPT    "Please select a destination-directory for\nthe packing of archives:")
  129.                         (HELP        "\nThis Directory is used by SysOp-Download to create\nan archive and pack all flagged files into this\narchive, so there should be at least 2MB free to avoid disk-full problems. Of course the archives\nwere deleted after downloading them.")
  130.             (DEFAULT "RAM:T/")))
  131.  
  132.   (SET packernames
  133.         (ASKOPTIONS    (PROMPT "\nPlease choose which Packers you want to use\n")
  134.                                 (HELP "\nPlease choose the packers you want to\nuse with SysOp-Download. After selecting,\nyou where asked for the location of the\nselected packers.\n\n")
  135.                                 (CHOICES     "LHA"
  136.                              "LZX"
  137.                                                     "ZIP")))
  138.     (COMPLETE 44)
  139.     (IF (IN packernames 0)
  140.     (SET lhapacker
  141.             (ASKFILE    (PROMPT "Please select location for LHA-archiver:")
  142.                                 (HELP    "\nHere you have to enter the location where LHA\ncould be found. SysOp-Download was tested with\nLHA V1.30 upto V1.50.")
  143.                   (DEFAULT (EXPANDPATH "C:")))))
  144.  
  145.     (COMPLETE 46)
  146.     (IF (IN packernames 1)
  147.     (SET lzxpacker
  148.             (ASKFILE    (PROMPT "Please select location for LZX-archiver:")
  149.                                 (HELP    "\nHere you have to enter the location where LZX\ncould be found. SysOp-Download was tested with\nLZX V1.00 upto V1.20 Evaluation.")
  150.                   (DEFAULT (EXPANDPATH "C:")))))
  151.  
  152.     (COMPLETE 48)
  153.     (IF (IN packernames 2)
  154.     (SET zippacker
  155.             (ASKFILE    (PROMPT "Please select location for ZIP-archiver:")
  156.                                 (HELP    "\nHere you have to enter the location where ZIP\ncould be found. SysOp-Download was tested with\nZip 2.0.1 (Sept 18th 1993).")
  157.                   (DEFAULT (EXPANDPATH "C:")))))
  158.  
  159.   (IF (<> lhapacker "")
  160.     (TOOLTYPE (DEST PRGDIR)
  161.         (SETTOOLTYPE "LHA" lhapacker)
  162.             (NOPOSITION)))
  163.  
  164.   (IF (<> lzxpacker "")
  165.         (TOOLTYPE (DEST PRGDIR)
  166.             (SETTOOLTYPE "LZX" lzxpacker)
  167.             (NOPOSITION)))
  168.  
  169.   (IF (<> zippacker "")
  170.         (TOOLTYPE (DEST PRGDIR)
  171.             (SETTOOLTYPE "ZIP" zippacker)
  172.             (NOPOSITION)))
  173.  
  174.     (TOOLTYPE (DEST PRGDIR)
  175.         (SETTOOLTYPE "TEMP_PATH" tempdir)
  176.         (NOPOSITION))
  177.     )
  178. )
  179.  
  180. (COMPLETE 50)
  181.  
  182. (TOOLTYPE (DEST PRGDIR)
  183.     (SETTOOLTYPE "PASSWORD" Password)
  184.     (NOPOSITION))
  185.  
  186. ;------------------- Dokumente & Hilfen installieren ------------------------
  187.  
  188. (COMPLETE 60)
  189.  
  190. (SET contents
  191.     (ASKOPTIONS (PROMPT "Please choose which parts you want to install:\n(Help for more informations)")
  192.               (HELP dokuhelp)
  193.               (CHOICES  "SysOpDL.guide   (26 KB)"
  194.                                                 "SysOpDL.history ( 3 KB)"
  195.                                                 "SysOpDL.hlp     ( 1 KB)")))
  196.  
  197. (COMPLETE 65)
  198.  
  199. (IF (IN contents 0)
  200.     (COPYFILES     (SOURCE "SysOpDL.guide")
  201.                             (DEST    @default-dest)
  202.               (INFOS)))
  203.  
  204. (COMPLETE 70)
  205.  
  206. (IF (IN contents 1)
  207.     (COPYFILES     (SOURCE "SysOpDL.history")
  208.                             (DEST    @default-dest)
  209.               (INFOS)))
  210.  
  211. (COMPLETE 75)
  212.  
  213. (IF (IN contents 2)
  214.     (COPYFILES     (SOURCE "SysOpDL.hlp")
  215.                             (DEST    @default-dest)
  216.               (INFOS)))
  217.  
  218. ;------------- NU KOMMEN DIE BBS-SPEZIFISCHEN DINGE -----------------------
  219. ;
  220. ;-------------------- AMIEX-ICON INSTALLIEREN -----------------------------
  221.  
  222. (IF (= BBSSYSTEM 1)
  223.  (
  224.   (COMPLETE 80)
  225.   (SET comdir
  226.    (ASKDIR (PROMPT "Please choose your BBSCMD/ Drawer:")
  227.        (HELP @ASKDIR-HELP)
  228.        (DEFAULT commanddir)))
  229.  
  230.    (COPYFILES (SOURCE "BBS/COMMANDS/BBSCMD/DS.INFO")
  231.                       (DEST comdir))
  232.  
  233.   (COMPLETE 90)
  234.  
  235.   (SET TTYPE
  236.    (ASKNUMBER (PROMPT "Enter the Access-Level required to start\n\nSysOp-Download in Amiex :")
  237.               (HELP @ASKNUMBER-HELP)
  238.               (DEFAULT 50)))
  239.  
  240.   (SET AXSLEVEL (cat TTYPE))
  241.   (SET PRGDIR (tackon @default-dest "SysOpDL"))
  242.   (TOOLTYPE (DEST (tackon comdir "DS"))
  243.    (SETTOOLTYPE "ACCESS" AXSLEVEL)
  244.    (SETTOOLTYPE "LOCATION" PRGDIR)
  245.    (NOPOSITION))
  246.  
  247.     (COMPLETE 95)
  248.  
  249.   (SET mess #GODS)
  250.  ))
  251.  
  252. ;------------- FAME-DOOR DEFINITION INSTALLIEREN --------------------------
  253.  
  254. (IF (= BBSSYSTEM 0)
  255.  (
  256.  (COMPLETE 90)
  257.   (SET comdir
  258.    (ASKDIR (PROMPT #FAMEDEST)
  259.            (HELP @ASKDIR-HELP)
  260.            (default "FAME:SETTINGS/DOORS/BBSCMD")))
  261.    (COPYFILES (HELP @COPY-HELP)
  262.               (SOURCE "FAME/SETTINGS/DOORS/BBSCMD/DS")
  263.               (DEST comdir))
  264.  
  265.    (SET mess ("%s%s" #SYSED #GODS))
  266. ))
  267.  
  268. ;---------------- INSTALLATION BEENDEN UND RAUS HIER -----------------------
  269.  
  270. (COMPLETE 100)
  271.  
  272. (EXIT mess)
  273.